
* This do file generates Figure A-2

use "Datasets/00_rawdata/census_1860_2001.dta", replace

twoway (scatter mcasviu_hogar2001 mcasviu_hogar1860) (lowess mcasviu_hogar2001 mcasviu_hogar1860), legend(off) xtitle("# Adult Women" "per household, 1860") ytitle("# Adult Women" "per household, 2001")

graph export "Figures/Figure_A2.pdf", replace

